#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <time.h>
#include <unistd.h>

#define NTP_SERVER "203.107.6.88"      // NTP服务器地址:"ntp3.aliyun.com" 203.107.6.88
#define NTP_PORT 123                   // NTP服务器端口号
#define NTP_PACKET_SIZE 48             // NTP数据包大小
#define NTP_UNIX_OFFSET 2208988800UL   // UNIX时间戳(1970.1.1)和NTP时间戳(1900.1.1)之间的偏移量
#define NTP_RCV_TIMEOUT 2              // 接收超时时间（秒）
#define MAX_RETRIES 5                  // 最大重试次数

#define NTP_BEIJING_TIME_OFFSET     (8*60*60)

// NTP数据包结构体
typedef struct {
    uint8_t li_vn_mode;                // 润秒指示器(2),版本号(3),模式(3)
    uint8_t stratum;                   // 服务器层级,1-主服务器,2-从服务器,0-未同步
    uint8_t poll;                      // 连续NTP请求间的最大间隔,2的幂表示
    uint8_t precision;                 // 服务器时钟的精度,2的幂表示(秒)
    uint32_t root_delay;               // 从NTP客户端到NTP服务器的根延迟(秒)
    uint32_t root_dispersion;          // NTP服务器与其上一级时钟源的偏差(秒)
    uint32_t reference_identifier;     // NTP服务器的参考标识符,通常指示了服务器的源
    uint32_t reference_timestamp[2];   // 参考时间戳
    uint32_t origin_timestamp[2];      // 发起时间戳
    uint32_t receive_timestamp[2];     // 接收时间戳
    uint32_t transmit_timestamp[2];    // 传输时间戳
} ntp_packet;

void ntp_get_time_once() {
    int sockfd;
    struct sockaddr_in server_addr;
    ntp_packet packet = {0};
    time_t ntp_time;
    int retries = 0;
    int recv_len;
	char time_str[64];  // 声明time_str变量
	char cmd[64]; 

    struct timeval timeout;
    timeout.tv_sec = NTP_RCV_TIMEOUT;
    timeout.tv_usec = 0;

    // 创建socket
    sockfd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
    if (sockfd < 0) {
        perror("socket failed");
        return;
    }

    // 设置接收超时时间
    setsockopt(sockfd, SOL_SOCKET, SO_RCVTIMEO, &timeout, sizeof(timeout));

    // 设置NTP服务器地址
    memset(&server_addr, 0, sizeof(server_addr));
    server_addr.sin_family = AF_INET;
    server_addr.sin_port = htons(NTP_PORT);
    server_addr.sin_addr.s_addr = inet_addr(NTP_SERVER);

    // 初始化NTP请求数据包
    packet.li_vn_mode = (0x3 << 6) | (0x3 << 3) | 0x3; // NTP版本3、客户端模式
    packet.transmit_timestamp[0] = htonl(NTP_UNIX_OFFSET);

    // 重试逻辑
    while (retries < MAX_RETRIES) {
        // 发送NTP请求
        if (sendto(sockfd, (const char*)&packet, sizeof(packet), 0, (struct sockaddr*)&server_addr, sizeof(server_addr)) < 0) {
            perror("sendto failed");
            close(sockfd);
            return;
        }

        // 接收NTP响应
        recv_len = recvfrom(sockfd, (char*)&packet, sizeof(packet), 0, NULL, NULL);
        if (recv_len >= 0) {
            // 成功接收，计算NTP时间
            ntp_time = (time_t)(ntohl(packet.transmit_timestamp[0]) - NTP_UNIX_OFFSET - NTP_BEIJING_TIME_OFFSET);
			
			struct tm *ntp_tm = localtime(&ntp_time);
            strftime(time_str, sizeof(time_str), "%Y-%m-%d %H:%M:%S", ntp_tm);
            printf("NTP time: %s\n", time_str);
			
            //printf("NTP time: %s", ctime(&ntp_time));
            close(sockfd);
			
			//同步给硬件
			// 使用date命令设置系统时间
            snprintf(cmd, sizeof(cmd), "date -s \"%s\"", time_str);
            system(cmd);
			
			snprintf(cmd, sizeof(cmd), "hwclock -w");
            system(cmd);
					
			
            return;
        } else {
            perror("recvfrom failed, retrying...");
            retries++;
        }
    }

    // 达到最大重试次数后失败
    printf("NTP sync failed after %d retries.\n", MAX_RETRIES);
    close(sockfd);
}

int main() {
    ntp_get_time_once();
    return 0;
}

